home *** CD-ROM | disk | FTP | other *** search
/ Winzipper / Winzipper_ISO.iso / programming / oracle7 7.2 / DOC / HLPDOC72 / HLPDOC72.DEI next >
Encoding:
Text File  |  1995-10-17  |  4.3 KB  |  132 lines
  1. /* Copyright (c) Oracle Corporation 1992.  All Rights Reserved */
  2. /*****************************************************************************
  3.   NAME
  4.     hlpdoc72.dei - V3 deinstall script for the Windows 95 hlpdoc72 product
  5.  
  6.   DESCRIPTION
  7.     This script deinstalls Windows 95 hlpdoc72 product
  8.  
  9.   OWNER
  10.     Rajesh Bansal
  11.  
  12.   MODIFIED    DD-MMM-YY  Reason
  13.    LMurphy    08/31/95     Removed parent hierarchy
  14.    LMurphy    06/01/95     Modified for use with Windows 95 doc10
  15.    LMurphy    24-JAN-94  Modified for use with On-Line Help
  16.    rbansal    12-DEC-94  Created
  17. *****************************************************************************/
  18. {
  19.     { doit = execute("%installer_home%\win95.dei"); }
  20.     [
  21.         'UNBOUND_VARIABLE: signal('failure,instantiate(nls("instver_too_early2",
  22.                                                            "The version of the Installer currently running is %%installer_version%%. The product(s) you have chosen to deinstall were installed with a later version of the Installer. Please use a later version of the Installer to deinstall these Product(s).")));
  23.     ]
  24.  
  25.     if (doit)
  26.     {
  27.  
  28.       /**********************************************************************
  29.          Ensure that the necessary environment variables are bound
  30.        **********************************************************************/
  31.  
  32.       {
  33.     oracle_group_name = v7_translate("ORACLE_GROUP_NAME");
  34.       }
  35.     [
  36.       'UNBOUND_ENVIRONMENT_VARIABLE, 'OS_ERROR:
  37.       {
  38.         variable = "ORACLE_GROUP_NAME";
  39.         information_dialog(instantiate(deinstall_prompt02),
  40.                    instantiate(deinstall_content02),
  41.                    instantiate(deinstall_help02));
  42.         doit = FALSE;
  43.       }
  44.     ]
  45.  
  46.       {
  47.         mshelp = v7_translate("MSHELP");
  48.         {
  49.           if (not(exists(mshelp)))
  50.             signal('UNBOUND_ENVIRONMENT_VARIABLE);
  51.         }
  52.           [ 'OS_ERROR: signal('UNBOUND_ENVIRONMENT_VARIABLE);
  53.             'INVALID_FILE_NAME: signal('UNBOUND_ENVIRONMENT_VARIABLE);
  54.             'PERMISSION_DENIED: signal('UNBOUND_ENVIRONMENT_VARIABLE); ]
  55.       }
  56.         [
  57.           'UNBOUND_ENVIRONMENT_VARIABLE:
  58.           {
  59.             variable = "MSHELP";
  60.             information_dialog(instantiate(deinstall_prompt02),
  61.                                instantiate(deinstall_content02),
  62.                                instantiate(deinstall_help02));
  63.             doit = FALSE;
  64.           }
  65.         ]
  66.     }
  67.     
  68.     if (doit)
  69.     {
  70.  
  71.         /*************************************
  72.            Bind all NLS deinstall strings here...
  73.         **************************************/
  74.  
  75.         po7_hlp_name = nls("po7_hlp_name","Personal Oracle7 Help");
  76.         orcl7_msg_name = nls("orcl_msg_name","Oracle7 Error Messages");
  77.         cust_support_name = nls("cust_support_name","Customer Support");
  78.  
  79.         deinstall_unregister    = nls("deinstall_unregister", "Unregistering %%registry_label%%...");
  80.     unreference_dependencies= nls("unreference_dependencies", "Unreferencing %%registry_label%% Dependencies...");
  81.         deinstall_scripts           = nls("deinstall_scripts", "Removing %%registry_label%% Installation Scripts...");
  82.         deinstall_files           = nls("deinstall_files", "Removing %%registry_label%% Files...");
  83.  
  84.     /********************
  85.     Deinstall the product
  86.     *********************/
  87.  
  88.     ui_action(instantiate(deinstall_scripts));
  89.     remove(deinst);
  90.  
  91.     ui_action(instantiate(deinstall_files));
  92.     /* *.GID is created when *.HLP is executed */
  93.     /* They are removed below */
  94.     {
  95.     remove_file("%MSHELP%\SQLNET.GID");
  96.     }
  97.     [ 'INVALID_FILE_NAME, 'PERMISSION_DENIED, 'WRITE_ERROR, 'OS_ERROR:
  98.         continue();
  99.     ]
  100.     {
  101.     remove_file("%MSHELP%\ORA.GID");
  102.     }
  103.     [ 'INVALID_FILE_NAME, 'PERMISSION_DENIED, 'WRITE_ERROR, 'OS_ERROR:
  104.         continue();
  105.     ]
  106.     {
  107.     remove_file("%MSHELP%\ORCSPT.GID");
  108.     }
  109.     [ 'INVALID_FILE_NAME, 'PERMISSION_DENIED, 'WRITE_ERROR, 'OS_ERROR:
  110.         continue();
  111.     ]
  112.     {
  113.     remove_file("%MSHELP%\PO7.GID");
  114.     }
  115.     [ 'INVALID_FILE_NAME, 'PERMISSION_DENIED, 'WRITE_ERROR, 'OS_ERROR:
  116.         continue();
  117.     ]
  118.     remove(doc); 
  119.  
  120.     /*********************
  121.     Unregister the product
  122.     **********************/
  123.  
  124.     if (not(registered("w95rdbms72")))
  125.         modify("MSHELP","",ora_config,registry_filename(current_registry));
  126.  
  127.     ui_action(instantiate(deinstall_unregister));
  128.     unregister(current_registry);
  129.         
  130.     permit_retry_operations = FALSE;
  131.     }
  132. }